home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / langs / prolog68.zoo / prolog.68 / codes / dstruct.wam < prev    next >
Encoding:
Text File  |  1994-06-03  |  5.7 KB  |  119 lines
  1. Data structure package
  2. p'closed_list'/1 34 528 30 18 12 532 8 4 64 518 534 96 257 288 515 p'closed_list'/1
  3. 520
  4.  
  5. p'get_item'/3 246 528 86 86 198 532 24 12 48 0 11 81 'node34'/7 354 262
  6. 547 518 533 24 48 0 19 81 'node34'/7 257 354 261 547 518 533 24 48 0 27
  7. 81 'node34'/7 258 354 260 547 518 534 512 20 0 -4 1 -8 2 -20 144 -8 177
  8. 'node34' 178 0 59 127 2048 -16 127 2048 -12 516 388 384 480 3 506 480 4
  9. 500 432 384 480 2 510 451 145 -8 146 -12 516 392 160 -16 20 161 -12 20 146
  10. -20 513 32 515 p'get_item'/3 535 4 12 537 -120 529 24 [ 1 -200 2 -176 3
  11. -150]
  12.  
  13. p'list_to_set'/2 40 512 8 0 -8 1 -4 144 -8 514 p'closed_list'/1 0 144 -8
  14. 145 -4 513 20 517 160
  15.  
  16. p'put_item'/4 298 528 172 172 250 532 54 16 48 0 11 81 'node34'/7 257 289
  17. 288 292 293 294 295 83 'node34'/7 354 321 320 324 325 326 327 547 518 533
  18. 52 48 0 19 81 'node34'/7 289 257 288 292 293 294 295 83 'node34'/7 321 354
  19. 320 324 325 326 327 547 518 533 52 48 0 27 81 'node34'/7 289 288 257 292
  20. 293 294 295 83 'node34'/7 321 320 354 324 325 326 327 547 518 534 512 16
  21. 2 -16 400 480 3 506 437 400 480 2 510 418 245 0 114 -8 116 -4 514 p'replace_son'/5
  22. 0 144 -12 161 -8 16 146 -16 163 -4 16 513 28 515 p'put_item'/4 535 4 16
  23. 537 -86 529 24 [ 1 -252 2 -198 3 -144]
  24.  
  25. p'replace_son'/5 286 528 282 282 214 532 52 20 48 0 3 81 'node34'/7 289
  26. 288 293 354 290 294 295 83 'node34'/7 321 320 325 356 322 326 327 518 533
  27. 50 48 0 11 81 'node34'/7 289 288 293 294 354 290 295 83 'node34'/7 321 320
  28. 325 326 356 322 327 518 533 50 48 0 19 81 'node34'/7 289 288 293 294 295
  29. 354 290 83 'node34'/7 321 320 325 326 327 356 322 518 534 48 0 27 81 'node34'/7
  30. 289 288 293 294 295 296 354 83 'node34'/7 321 320 325 326 327 328 356 518
  31. 529 56 [ 0 -206 1 -154 2 -102 3 -52] 520
  32.  
  33. p'set_difference'/3 44 528 40 20 12 532 10 12 64 66 518 534 96 241 0 289
  34. 242 12 290 515 p'set_difference_1'/4 520
  35.  
  36. p'set_difference'/6 132 528 128 128 92 532 34 24 48 '<' 101 353 243 4 291
  37. 242 0 244 8 515 p'set_difference_2'/4 533 26 48 '=' 242 0 244 4 245 8 515
  38. p'set_difference'/3 534 48 '>' 244 0 245 12 515 p'set_difference_1'/4 529
  39. 24 [ '<' -84 '=' -50 '>' -24] 520
  40.  
  41. p'set_difference_1'/4 102 528 98 24 12 532 14 16 64 99 353 354 518 534 96
  42. 512 24 277 276 1 -16 2 -12 3 -8 112 -4 145 -16 146 -24 516 132 160 -4 24
  43. 145 -16 146 -12 147 -24 148 -20 149 -8 513 36 515 p'set_difference'/6 520
  44.  
  45. p'set_difference_2'/4 98 528 94 20 12 532 10 16 64 67 518 534 96 512 24
  46. 277 276 1 -16 2 -12 3 -8 112 -4 145 -24 146 -16 516 132 160 -4 24 145 -24
  47. 146 -20 147 -16 148 -12 149 -8 513 36 515 p'set_difference'/6 520
  48.  
  49. p'set_insert'/3 86 532 16 12 65 98 352 369 547 518 534 512 20 0 -20 97 275
  50. 274 2 -8 112 -4 145 -20 146 -16 516 132 160 -4 20 145 -20 146 -16 147 -12
  51. 148 -8 513 32 515 p'set_insert'/5
  52.  
  53. p'set_insert'/5 116 528 112 112 76 532 22 20 48 '<' 100 353 371 354 355
  54. 518 533 16 48 '=' 100 353 355 518 534 48 '>' 100 354 290 241 0 243 4 515
  55. p'set_insert'/3 529 24 [ '<' -68 '=' -46 '>' -30] 520
  56.  
  57. p'set_intersection'/3 44 528 40 20 12 532 10 12 64 66 518 534 96 241 0 289
  58. 242 12 290 515 p'set_intersection'/4 520
  59.  
  60. p'set_intersection'/4 98 528 94 20 12 532 10 16 64 67 518 534 96 512 24
  61. 277 276 1 -16 2 -12 3 -8 112 -4 145 -16 146 -24 516 132 160 -4 24 145 -16
  62. 146 -12 147 -24 148 -20 149 -8 513 36 515 p'set_intersection'/6 520
  63.  
  64. p'set_intersection'/6 132 528 128 128 92 532 32 24 48 '<' 242 0 243 4 244
  65. 8 245 12 515 p'set_intersection'/4 533 28 48 '=' 101 353 242 0 290 244 4
  66. 515 p'set_intersection'/3 534 48 '>' 244 0 245 12 515 p'set_intersection'/4
  67. 529 24 [ '<' -84 '=' -52 '>' -24] 520
  68.  
  69. p'set_member'/2 50 512 12 0 -12 97 290 273 112 -4 145 -12 516 132 160 -4
  70. 12 145 -12 146 -8 513 24 515 p'set_member'/3
  71.  
  72. p'set_member'/3 82 528 78 78 42 532 12 12 48 '=' 518 534 48 '>' 241 0 242
  73. 4 515 p'set_member'/2 529 24 [ '=' -34 '>' -24] 520
  74.  
  75. p'set_remove'/3 66 512 20 0 -20 97 275 274 2 -8 112 -4 145 -20 146 -16 516
  76. 132 160 -4 20 145 -20 146 -16 147 -12 148 -8 513 32 515 p'set_remove'/5
  77.  
  78. p'set_remove'/5 92 528 88 88 52 532 16 20 48 '=' 36 12 518 534 48 '>' 100
  79. 354 290 241 0 243 4 515 p'set_remove'/3 529 24 [ '=' -44 '>' -30] 520
  80.  
  81. p'set_split'/4 50 528 46 22 12 532 12 16 64 66 67 518 534 96 241 0 289 243
  82. 16 242 12 290 515 p'set_split_1'/5 520
  83.  
  84. p'set_split'/7 146 528 142 142 106 532 38 28 48 '<' 102 353 242 0 244 8
  85. 292 243 4 245 12 515 p'set_split_2'/5 533 32 48 '=' 101 353 242 0 290 244
  86. 4 246 12 515 p'set_split'/4 534 48 '>' 244 0 245 12 246 16 515 p'set_split_1'/5
  87. 529 24 [ '<' -98 '=' -60 '>' -28] 520
  88.  
  89. p'set_split_1'/5 112 528 108 26 12 532 16 20 64 67 100 353 354 518 534 96
  90. 512 28 278 277 1 -20 2 -16 3 -12 4 -8 112 -4 145 -20 146 -28 516 132 160
  91. -4 28 145 -20 146 -16 147 -28 148 -24 149 -12 150 -8 513 40 515 p'set_split'/7
  92. 520
  93.  
  94. p'set_split_2'/5 108 528 104 22 12 532 12 20 64 67 68 518 534 96 512 28
  95. 278 277 1 -20 2 -16 3 -12 4 -8 112 -4 145 -28 146 -20 516 132 160 -4 28
  96. 145 -28 146 -24 147 -20 148 -16 149 -12 150 -8 513 40 515 p'set_split'/7
  97. 520
  98.  
  99. p'set_union'/3 46 528 42 22 12 532 12 12 64 34 4 518 534 96 241 0 289 242
  100. 12 290 515 p'set_union'/4 520
  101.  
  102. p'set_union'/4 102 528 98 24 12 532 14 16 64 99 353 354 518 534 96 512 24
  103. 277 276 1 -16 2 -12 3 -8 112 -4 145 -16 146 -24 516 132 160 -4 24 145 -16
  104. 146 -12 147 -24 148 -20 149 -8 513 36 515 p'set_union'/6 520
  105.  
  106. p'set_union'/6 136 528 132 132 96 532 34 24 48 '<' 101 353 243 4 291 242
  107. 0 244 8 515 p'set_union'/4 533 28 48 '=' 101 353 242 0 290 244 4 515 p'set_union'/3
  108. 534 48 '>' 101 355 291 244 0 515 p'set_union'/4 529 24 [ '<' -88 '=' -54
  109. '>' -26] 520
  110.  
  111. p'tree_get_item'/3 40 81 '+'/2 291 289 480 0 400 487 400 403 486 400 480
  112. 1 500 432 515 p'get_item'/3
  113.  
  114. p'tree_put_item'/4 50 81 '+'/2 292 289 83 '+'/2 324 291 480 0 400 487 400
  115. 404 486 400 480 1 500 432 515 p'put_item'/4
  116.  
  117. p'tree_size'/2 22 528 6 18 18 80 '+'/2 353 257 518 520
  118.  
  119.